
//---------------------------------------------------
// FIGURE A1: Number of Congressional Staff Over Time
//---------------------------------------------------

* Data source: https://www.brookings.edu/multi-chapter-report/vital-statistics-on-congress/

clear
insheet using "vitalstats_ch5_tbl1.csv"
replace staff = "" if staff == "n.a"
replace staff = "" if staff == "n.a."
replace staff = "" if staff == "."
destring(staff), replace

twoway (line staff year if category == "Senate" & type == "Subtotal", xlabel(1980(10)2010) ytitle("Number of Staff") graphregion(color(white)) lwidth(thick) legend(off) lcolor(black)) ///
(line staff year if category == "House" & type == "Subtotal", xlabel(1980(10)2010) lwidth(thick) lpattern(dash) legend(off) lcolor(gs5)) ///
(line staff year if category == "Total" & type == "All", xlabel(1980(10)2010) lwidth(thick) lpattern(shortdash) legend(off) lcolor(gs8) text(7000 1982 "Senate") text(12500 1982 "House", color(gs5)) text(28000 1982 "All", color(gs8))) 

 
